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Osituskäyttö 


BASIC-KIELEN ALKEET 


Parxd 
o 

Ea 
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BASIC-KURSSI 


| 


11 


Johdanto 


Esimerkki 


ELN 


Kieli on kehitetty 60-luvun alussa Yhdysvalloissa 
Darthmouth-Collegessa professorien Kemenyn ja 
Kurzin johdolla samoin kuin ensimmäinen ositus- 
käyttösysteemi. BASIC on lyhenne sanoista 
Beginners' Allpurpose Symbolic Instruction Code. 
Nimastöän huolimatta se on tehtävän läheinen mate- 
maattinen kieli, jota käyttävät muutkin kuin aloit- 


teiijat. 


Alla on lyhyt BASIC-kielinen ohjeima 


10 INPUT R 
20 LET A 
30 PRINT A 
40 END 


3.1415*Rf2 


" 


Erikosta tekstissä on monelle, että 

- ohjeimassa on vain suuria kirjaimia. Päätteessä, 
jolta ohjeimat kirjoitetaan, on -myös ainoastaan 
suuret kirjaimet 

- jokainen rivi alkaa numerolla. Näiden numeroiden 
avuila voidaan ohjelman käskyjen suoritusjärjes- 
tystä muuttaa ja niistä on paljon muutakin hyö- 
Ty:d. 


Rivinumeroiden jälkeen välittömästi seuraavat 

englanninkieliset sanat, esimerkiksi INPUT, ovat 
BASIC-käskyjä, joiden merkitys sellaisina on täsmäi- 
lisempi ja rajoitetumpi kuin normaalissa englannin- 
kielessä. Rivinumeron jälkeen täytyy aina olla P3l- 


lainen sana. 


tietotehdas oy 


Sanojen, lukujen ja erilaisten merkkien väliin voi- 
daan jättää tilaa kuinka runsaasti tahansa tai ne 
voidaan kirjoittaa yhteen. Ohjelman ensimmäinen PVT 


voitaisiin Kirjoittaa. es amen kiksi 


IOINPUTR 


Ohjelman iauseet suoritetaan rivinumerojärjestyksessä, 


jollei toisin kähdeliaä erityisellä käskyllä määrätä. 


Lause 10 on kehoitus tietokoneelle pyytää käyttäjältä 
muuttujatie R arvo (INPUT R = SYÖTÄ MUUTTUJAN R ARVO 
SISÄÄN). Käyttäjä kirjoittaa haluamansa R:n arvon 
päätteellä koneen painettua paperille kysymysmerkin 


ja jäätyä odottamaan. 


Lause 20 saa koneen laskemaan yhtäiäisyysmerkin oi- 
keailia puoiella olevan lausekkeen ja sijoittamaan 


saamansa tuloksen muuttujan A arvoksi. 


Lauseen 30 kehoituksesta kone painaa muuttujan A 
agvon päätteessä olevalle listalle. 
Lause 40 iimoittaa koneeile, että suoritettavia lau- 


seita ei ole enempää. 


Esimerkissä on kaikki normaalin ohjelman osat: 
- käsiteltävien tietojen sisäänsyöttöosa, INPUT- 
lause 
- tietoa varsinaisesti käsittelevä osa, LET-lause 
- haluttuun muotoon käsiteilyn tiedon tulostusosa, 


PRINT-iause. 


Kuitenkin ohjeima on melko hyödytön. Tuskin kukaan 
laskisi ympyrän aian sen avuilta. Hyöty lisääntyy, jos 
ohjeimaa muunnetaan niin, että se laskee samalla 


ajokerralla useiden erisäteisten ympyröiden alan. 


LK EUVvut 


JO INPUT R 
20 LET A = 3.1415%R42 


30 PRINT A 
35 G60TN 10 
40 END 


Tämän ohjelman suorittamista kone ei iopeta suoritet- 
tuaan lauseen 30, vaan uusi lause GOT0 10 saa koneen 
siirtymään riviltä 10 olevaa lausetta suorittamaan | 
eli pyytämään käyttäjältä uuden säteen arvon, Kone 
suorittaa lauseita 10, 20, 30 ja 35, kunnes. sen 
toiminta jollakin erikoistoimenpitsellä keskeytetään. 
Tällaista ohjelman osaa nimitetään silmukaksi eli 
loopiksi. Niitä käyttämällä saadaan kone tekemään 


paljon työtä vähällä valvalla. 


BASIC-kieiessä on kolmeniaisia lukuja: 
- kokonaistiukuja, esimerkiksi 1, 123, -12 
- desimaalilukuja, joita kutsutaan myös reaali- 
Vuvulksi, esimerkiksi. 2:551-.2 
- eksponenttilukuja, esimerkiksi -12.4E-3, mikä 
algebrassa merkittäisiin - 
ahon [93 


Desimaalipilkun asemesta käytetään pistettä. Pilkkua 


käytetään tässä systeemissä muihin tarkoituksiin. 
Y. y 


Murtolukuja ei kielessä ole, kuten ei muitakaan edellä 


mainitsemattomia lukuja. 


Luvut voidaan mi29 konselle korkeintaan 9 numeron 
tarkkuudettäi Itgojsarvoitaan suurin koneeseen mahtuva. 
luku on f 5478960 16' ja lähinnä nollaa on luku 

2 4.3180RETR JO | 1) ji 
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IV Muuttujat 


V Operaattorit 


Ohjelmointikielissä ja matematiikassa käytetään 
muuttujia, jotka voivat saada arilaisia numeroarvoja. 
BASIC-kielen muuttujalle tietokone varaa muistiinsa 
paikan, missä muuttujan arvo säilytetään fyysisesti. 
Muuttujan nimessä on yksi kirjain tai yksi kirjain 


ja yksi numero. Siis sallitut muuttujien nimet ovat: 


AITA O TARKAS. ams eaten A9 
5.0.90. JB Nano ttyo B9 
O OAO NE 1 E i L0. PST C9 


LK 0 L esto ksi. 


Muuttujille annetaan arvot LET-, READ- tai INPUT- 
lauseilia. Tämä arvo muuttuu vain, jos muuttujalle 
annetaan arvo uudella tältaisella lauseella. "luuttu- 
jaila on aina oitava arvo. Jos laskettavan lausekkeen 
katkilla muuttujilla ei ole ennalta määrättyä arvoa, 


ei kone pysty lauseketta laskemaan. 


| Aritmeettiset operaattorit 
- yhteenieskuoperaattori on tuttu "+" 


11:20 


- vähennysiaskuoperaattori on 
- kertoiaskuoperaattori on tähti "x" 
- jakoiaskuoperaattori on kauttaviiva "/" 


- potenssiinkorotusoperaattori on "4" 


- Laskujärjestys on sama kuin matematiikassa. Järjestys 


voidaan muuttaa sulkumerkeiliä "()", joita voi olla 


useita sisäkkäin. 


ae 


Gagra 


VI 


Relaatio-operaattorit 


N 


Myöhemmin esitettävässä BASiC-käskyssä voidaan 


testata ehtoja. lässä käskyssä 


- merkki "<" tarkoittaa yhtäsuuruusrelaatiota 

- merkki ">" suuremmuusrelaatiota 

- merkki "<!" pienemmyysrelaatiota 

- merkki ">=" relaatiota, "suurempi tai yhtä suu 
kuin" 

- meikki "<=" relaatiota, "pienempi tat yhtä suur 

SLL 


kuin 


- merkki "<?" erisuuruusre!aatiota 


Esimerkki 2 
tehtävänä on rätkäista yhtä!öryhmä 
AKA TUD IAT S 


Ax >= esi 


muutamalla c:n Ja-sfin arvolla. Paramettiststambsa 


pidetään vakioina, esimerkiksi a = |, b. = 2,.d = 4, 


—- 


e = 2. Nikoot ensimmäisellä kerraila c = -7, 
toisella kerralla € <= 1, f = 3, kolmannetla kerralia 


6 2.45 K 403 


Jos ae-bd ei oie 0, 


ce - bf TESS! 
ananas EMME YAAT 2149 aija! Takas 
AS v D ae -. bd 


Jos ae-bd=0, ei yhtäiöryhmätiä ole ainakaan yksi- 


käsitteistä ratkaisua. 


BASIC-kieieilä koneelle kii joitetut tehtävän suorit- 


tamisohjeet ovat tällaiset: 


| 


I'0 READ A, 8,D,E 
20 LET N =AxwtE - 37) 
30 ARN = 00 THEN 90 


COE -BWXF 3 N 
50. LET YY L (MER -CRXD) /N 


n 

ai 

M 

rm 

pot 
i 


TO PRINT XK Yf 
80 60T0 40 


90 PRINT TYKSIKASITTEISIÄ RATKAISUA Ei OLE" 


ja 


100 DATA 4,:2,4,2 
110 DATA =7,5,1,3,4,-7 


[20 END 


v 
jo 
w 


Lauseessa 10 on uusi BASI(IC-käsky, READ, joka liittyy 
kiinteästi riveitiä 100 ja 110 oleviin käskyihin 
DATA. Kun ohjelma fuetaan tietokoneeseen, käskyjen 
DATA jäljessä olevat luvut siirtyvät rivinumerojär- 
jestyksessä muistiin yhdeksi käsiteltävien tietojeri 
varastoksi. Ohjelmaa suoritettaessa DATA-lauseita =: 
kasite!!ä, vaan ne sivuutetaan. Jokainen käsky READ 
siirtää ensimmäisen käyttämättömän DATA-varastossa 
olevan tuvun sen muuttujan at voksi, jonka nimi on 


ensimmäisenä sanan REAN jäljessä, toisen käyttämättiö- 
män luvun sen muuttujan arvoksi, jonka nim! on toisena 


sanan READ jäljessä, ja niin edelleen. Stis lauseessa; 
kymmenen aseteraen muuttujaa A arvoksi |, muuttujat 


E arvoksi 2. Ensimmäiseksi käyttämättömäksi tuvuksi 


Lause 20 on futtu LET-lause. Siinä fasketaan tulojen 


! 


ae ja bd erotus jä annetaan se muuttujan N arvoks:. 


2 


Lauseern 50 käsky IF ehto IHEN rivinumero, on Toinen 


' 
BAS1IC-kieien käsky, jolia käskyjen suoritusjarjestys 
voidaan muuttaa. Jos ento, N-:0, on tosi, suorittaa 
kone seuräaväksi lauseen 90, Jos N ei ole 0, suorit 
kone seuraavaksi lauseen, jonka numero on lähinnä 


suurempi, siis iauseen 40. 


tietotehdas oy 


Veljet 


Lauseessa 40 sijoitetaan muuttujan C arvoksi ensim: 


mäinen DATA-varaston käyttämätön iuku, -7 ja muutii 


jan F arvoksi toinen DATA-sarasion käyttämätön luku. 


Lauseessa 50 lasketaan tulojen ce ja bf erotus, jau- 


taan se aikaisemmin lasketulla tuntemattomien nimi 


jäliä ja sijoitetaan tulos muuttujan X arvoksi. 


Lause 60 on samaniainen kuin 50. 


Lauseen 70 kehoituksesta kone painsa päätteen jista!l 


hiukan eritleen toisistaan muuttujien X ja Y arvol. 


Lauseen 80 käsky GOTO 40 saa koneen suorittamaan käs- 


kyt 40,50,60,70,80 yhä uudelleen kunnes DATA-varas- 


tosta ei riitä uusia arvoja muuttujille C ja FF. Tässä 


ohjelmassa on siis myös siimukka. 


Lauseen 90 kone suorittaa vöäiri, jos ae-bd on 0. Tä! 


löin kone painaa listaile juuri re merkit, jotka cva' 


käskyn PRINT jäijessä lainausmerkkien sisäliä, sit. 


YKSIKASITTEISTÄ RATKAISUA EI OLE 


Lause 120 on tieto koneelle, etiä ohjelmassa ei ole 


useampia lauseita. 


Virheiden korjaaminen 


Muotovirheiden korjaamisessa auttaa kone. Jos yrität 


käyttää ohjelmaa, jossa ei ele käskyä END, kone pai 


'naa paperiltltesi 


NO END STATEMENI 


Ja lepettaa ohjeiman käsitieiys Osan mahdb!iis:ste 
virheistä kone löytää kääntäessään ohjelman omaile 


kielelleen, osan vasta suorittasssaan sitä. 


— am. 


Det maa ili 


lä 


Vale lif 
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Funktiot 


Jos huomaat kirjoittaneesi jonkun rivin, esimerkiksi 
10: KERUSNKEK 


väärin, saat ohjelman kuntoon kirjoittamalla rivin 


uudelleen. Siis kirjoita 


10: 'ENPUT "K 


Tietokone ei välitä lauseiden kirjoitusjärjestyksestä, 
vaan suorittaa ohjelman rivinumeroiden tai käskyjen 


GOTO, IF-THEN osoittamassa järjestyksessä. 


Jos ohjelmassa on useita samannumeroisia lauseita 
tietokone suorittaa niistä vain viimeisen. Lauseet 
joissa on vain rivinumero tietokone sivuuttaa. Lause 
voidaan siis mitätöidä kirjoittamalla tyhjä saman- 
numeroinen lause. Esimerkiksi lause 

10 -LETA 053 
voidaan mitätöidä kirjoittamalla myöhemmin 

10 


Rivi voidaan tuhota välittömästi sen kirjoittamisen 
jälkeen painamalla näppäintä 'ESC'!, jos näppäintä 
"RETURN" ei ole ehditty painaa. 


Merkkejä voidaan tuhota yksitellen painamalla ylä- 
tasossa olevaa merkkiä "€" eli samanaikaisesti näp- 
päimiä TSBEFTY ja "O", 


BASIC-kieleen on valmiiksi ohjelmoitu helposti käy- 


tettävään muotoon sellaisia ohjelmia, joita käyttäjät 
usein tarvitsevat. Näitä osia nimitetään sisäisiksi 
funktioiksi. 


+ 


Esimerkiksi lause 
10 LETA = SOR (4) 


aitaa muuttujan A arvoksi luvun 4 neliöjuuren 2. 
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iX = BASIC-käskyt 


9 
Luettelo funktioista 
Funktio Merkitys Huomautuksia 
SIN (X) sin X 
C0S- (X) cos X argumentti radiaaneina 
TAN (X) tan X 
ATN (X) arc fan X tulos radiaaneina 
EXP (X) e* 
[06 (X) I n X 
ABS (X) [x! 
SOR (X) Va 
RND (X) satunnaisluku väliltä (0,1) 
INT (X) typistää x:n lähinnä pienemmäksi kokonais- 
luvuksi. | 


Suluissa oleva argumentti voi olla lauseke, joka 


saattaa sisältää funktioita. 


On olemassa käsky DEF, jolla ohjelmoija voi itse 


luoda tällaisia funktioita. 


DATA JuKu is IuRUTNZ. ss aio 


on käsky, jolla ohjelmoija sijoittaa käsiteltävää 
tietoa koneen muistiin otettavaksi käyttöön käskyllä 
READ. Näiden käskyjen toiminta on esitetty luvussa 


1/1 olevassa esimerkissä. 
DEF FN kirjain (muuttuja) = lauseke 


Tällä käskyllä määritellään myöhemmin samassa ohjel- 
massa käytettävä funktio. Funktion nimi on kolmi- 
kirjaiminen ja kahden ensimmäisen kirjaimen tulee 
oila FN. Esimerkiksi 

10 DEFFNA (X) = INT (Xw100 + 0.5)/100 

20 IN a A 11 

S00LETKC SS FNA (AB) 

40 PRINT C 


1 


Hr” tietotehdas oy 
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DIM *taulukon nimi | (luku 1, luku 2)),... 


Tällä käskyllä varataan indeksoiduille muuttujille 
sopiva tila. Sitä on aina käytettävä kun indeksi 


on suurempi kuin 10. 


END 


ilmoittaa ohjelman käskyluettelon lopun. 


FOR muuttuja = lauseke | TO lauseke 2 STEP lauseke 3 


aloittaa silmukan, antaa muuttujalle alkuarvon 

(lauseke |), kasvattaa sitä jokaisella suoritus- 
kerralla, lauseke 3:n verran ja lopettaa silmukan 
läpikäymisen kun muuttujan arvo on suurempi kuin 


lauseke 2. 


NEXT muuttuja 


kertoo mihin käskyn FOR aloittama silmukka loppuu. 


GOSUB rivinumero | 
siirtää koneen suorittamaan rivinumero 1|:stä 
lähtien aliohjelmaa ja tallettaa seuraavan käskyn 


osoitteen paluuta varten. 


RETURN 
palauttaa koneen suorittamaan ohjelmaa sen GOSUB- 
käskyn jälkeisestä lauseesta, josta hyppy aliohjel- 


maan tapahtui. 


GOTO rivinumero -| 
siirtää koneen suorittamaan lausetta rivinumero- 


I:stä lähtien. 


IF ehto-1|I THEN rivinumero-1 


siirtää koneen suorittamaan lausetta rivinumero-1, 
jos ehto-| on tosi, mutta antaa koneen suorittaa 


lauseet järjestyksessä, jos ehto-| ei ole tosi. 


SOON. 


5 


atsttT!: 


i 


N 


[S 


1 4FA 


4) 
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INPUT muuttuja 1, muuttuja 2,..... 


saa koneen painamaan listalle kysymysmerkin sekä 
odottamaan, kunnes käyttäjä on antanut arvot kaikille 
luettelossa mainituille muuttujille ja painanut 


näppäintä "RETURN". | 


LET muuttuja = lauseke 
laittaa koneen laskemaan yhtäläisyysmerkin oikealla 
puolen olevan: lausekkeen ja sijoittamaan tuloksen 


vasemmalla puolen olevan muuttujan arvoksi. Lauseke 


1707-63 JAN =alAu* 2 E 


on sallittu ja tämän tyyppiset lauseet ovat jopa 

yleisiä | 

PRINT | lauseke | ;j lauseke 2 
"huomautus |" , huomautus 2 


painaa joko lausekkeiden arvot tai huomautukset väli- 
listalle. Jos välissä on pilkku, se painaa jäljessä 


seuraavan arvon tai huomautuksen uuden 15 sarakkeen 


lohkon alusta lähtien. Jos välissä on pilkku on 


tabulointi tiheämpää. 4. 


READ muuttuja .umuuttuja Z, sv 008 


lukee ensimmäisen käyttämättömän DATA-varastossa 
olevan luvun muuttuja 1:n arvoksi, toisen muuttuja 


2:n arvoksi ja niin edelleen. 


REM vain ohjelmalistaan tuleva kommentti on tarkoi- 
tettu ohjelman ymmärtämistä auttavien lauseiden 


säilyttämiseen. 


RESTORE. 


äntaa mahdol!isuuden käyttää DATA-varasto uudelleen. 


STOP 


käskee koneen lopettaa ohjelman suorituksen. 
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X oSsitmukat 


| 2 
Alia oleva ohjelma on päättymätön silmukka. 
OLETAN =) 
20601010 
30 END 
Rivillä kymmenen kone asettaa ykkösen A:n arvoksi ja 
seuraavalla riviliä on käsky siirtyä tekemään sa- 


ma uudelleen. Tämä ohjelma on paitsi hyödytön myös 
vaarallinen, koska siinä ei ole yhtään tulostus- 
käskyä. Se ei kerro käyttäjälle ajon aikana mitään. 
Jos ohjelmaan jää tällainen silmukka, kone ehtii 
yleensä kuiuttaa keskusyksikköaikaa kohtuuttomasti, 


ennen kuin ajo huomataan keskeyttää. 


Jokaisessa silmukassa tulisi olla testikäsky, joka 
rajoittaa siimukan suorituskertojen määrää. Yleinen 
tapa pitää kirjaa siitä, kuinka monta kertaa kone 

on suorittanut siimukan, on laskurin sijoittaminen 
ohjelmakierroksen sisälie. Laskuri on muuttuja, jon- 
ka arvoa kone kasvattaa tavallisesti ykkösellä jo- 
kaisella kierroksella. 

Alla on ohjelma, jossa kymmenen kertaa suoritetta- 
va siimukka. Ohjelmassa on iaskuri, muuttuja X, Jon” 
ka arvo on siihen mennessä suoritettujen kierrosten 
määrä. Tätä arvoa testataan rivillä 40 olevalla eh- 
tolauseelia, joka lopettaa silmukan suorittamisen 


kymmenennen kerran jälkeen. 


KO LET. X t= | 

20. PRINT X5 508 R) 
SOLET X= X al 

40 iF X >i0 THEN 60 
5.0: .GOTOZ0 

60 END 


i EvSLivae 
ie = 4 v 2 
SO 10 s. 
ja 


3 R 


14409 416 
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O 


] tietotehdas oy 


Tällaiset ohjelmat ja ohjelman osat ovat niin ylei- 
siä, että niiden tekemistä on helpotettu lisäämällä 
BASIC-kieleen erityinen kaksiosainen silmukkakäsky, 
FOR-NEXT. Ensimmäinen tämän käskyn osa kertoo, mis- 
tä silmukka alkaa, mikä on laskurin nimi ja mitä ar- 
voja laskuri voi saada. Toinen osa kertoo, mihin 


siimukkaan kuuluvat käskyt loppuvat. 


( 
Edellinen esimerkki näyttää käskyä, FOR-NEXT, käyt- 
täen tällaiselta: 

( (0 -FSR-Xw 17010 

20.PRINT -X3-SOR(X) 
30 NEXT X 
40 END 
Silmukoita voidaan kirjoittaa sisäkkäin. Esimerkiksi 
lista siitä, kuinka monta pulloa viidestä kymmeneen 
pullonpuhalluskonetta tekee yhdessä, kahdessa Si 
kolmessa vuorossa, kun yksi kone puhaltaa 123 pulloa 
tunnissa, voidaan kirjoittaa näin 
[10 FOR K = 5 TO (/ 
; , 20/FOR T= 8.10 24 STEP 8 
30 PRINT K "KONETTA";T; "TUNNISSA" 
% * 40 PRINT "VALMISTAA"; K-T 123; "PULLOA" 
50 NEXT T i 
a 60 NEXT K 
4 70 END 


Sen sijaan silmukoita ei saa lomittaa. Jos siimukka 
alkaa toisen sisältä, on sen viimeisenkin käskyn 


oltava ulomman silmukan sisällä. 


FF tietotehdlas Oy 
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Xi Listat ja taulukot 
Aina ei kannata antaa kaikille muuttujille omaa ni- 
meä, vaan on helpompi käyttää yhteistä nimeä muuttu- 
jaryhmästä. Yksityisiin muuttujiin viitataan tällöin 


nimen perässä suluissa olevan järjestysluvun avulla. 


Esimerkiksi A(3) kertoo ohjelmoijan viittaavan muut- 
tujaryhmän A kolmanteen alkioon. Tällaista muuttuja- 


ryhmää kutsutaan listaksi tai vektoriksi. 


( Listan jäljessä sulkeissa voi olla myös muuttujan 
nimi tai lauseke. Tällöin sen arvo kertoo, monen- 


teenko listan muuttujaan viitataan. 


Esimerkiksi viiden myyntimiehen suhteellinen osuus 


koko myynnistä lasketaan kätevästi näin: 


n 


10 EET 0 

20.FOR-X. =.| T0-5 

30 PRINT "MIKA ON";X;'":N MIEHEN MYYNTI"; 
40 INPUT S(X) - 

BO KETI" T 2900 


” 


F 60 NEXT X 
"n 70.-FOR X = 1..70.5 
80 PRINT X;":N MIEHEN OSUUS ON"; 100S(X)/T 
EN: 90 NEXT X 
| 95 END 


— Muuttujaryhmät voidaan edelleen koota ryhmiksi, 


joita kutsutaan matriiseiksi tai taulukoiksi. 


Taulukon nimen jäljessä on sulkeissa kaksi lukua, 
muuttujaa tai lauseketta. Jälkimmäinen niistä ker- 
too, mitä edellisen osoittaman taulukon listan al- 


kiota halutaan käsitellä. 


ae 


si E ! jä 


vet 


E 


n 


e ja : 103 v1 


12) 
E 

a 
MaRa 
ri 
J, 
EN 


Oletetaan, että yhtiössä on viisi myyntimiestä, 


joista jokainen myy kolmea tuotetta. 


Ohjelma, joka laskee kunkir myyntimiehen osuuden 
kunkin tuotteen myynnistä, voidaan kirjoittaa esi- 
merkiksi näin . 
20 PRINT "MITKA OVAT TUOTTEIDEN HINNAT"; 
30 INPUT H(1), H(2), H(3) 
40 FOR jae [a J O MES: 
SOME Tn T00 
( 60 FOR B < 1 TO 5 
70 READ S(A,B) 
80 LET T >= T + 5S(A,8)xNCA)2 
90 NEXT ;B 
100 PRINT "MYYNTIMIESTEN OSUUDET" 
110 PRINT A;":N TAVARAN MYYNISTA" 
(20. PRINT 1111113 9 N 
[130 PRINT 100%S(A,1)/T.100YS(A,2); 100+S(A,3)/ 


T 
[40 PRINT 100*S(A,4:/T; 100%S(A,5)/T | 
[50 NEXT A 
| 160 END £ 
L : i 70 DATA <Ki2:3;3431546,7,8 79; 10,:L1 STA ATTAN 
a Jokaiselle ryhmämuuttuja!le, listalle tai taulukolie 


on varattava ohjelman alussa ti!aa käskyilä DIM, jos 
indeksin suurin arvo on suurempi kuin kymmenen. Näin 
on syytä meneteilä tilan säästämiseksi, vaikka indek- 


si olisi pienempi. 


Päinvastoin kuin useimmissa muissa kielissä on 
BASIC-listoissa ja taulukoissa myös nollas alkio, 
esimerkiksi A(0). Tämä on tärkeää muistaa, kun käy- 
tetään kokonaisten taulukoiden operointiin tarkoi- 


tettuja käskyjä, joita on yksitoista. 


ra AA 
x SAJ Dafi 


N = 5 af Kus yet = JI 5 | m 3 - N H 
IX 8D) EST LÄHIN OSS IGNST SINA ä 


i; 
E i ja ; j PESU LVÄES N ä . i 
H i E i | 13145301 2 ENS NW E 


= ORI 4. 1034 G i 
0 Ka X | 
e x = WI- 
a g N 
Jake: 5 HO (5 E 
4 
a 1-8 A Y i LIN € ja 
Pu da j k 
3.0 3 i 3 1:75 i PEN 
ri 
ti 9 
6. a 
14 £ rv 0" ja ( f ; 
D jr aik A (4 G l 
x 
2 N 1MSKi U 7 O 03 fi 
H i N ! 4 
kd 1238005 iA k 
2000: Ti 1:74) £ ta 
£A , n % | 
E N ( ! 
TTA - 
KI ; 
N b, = C H KA 8 , [ 
* E kk ken 4 ' / * 
E . 
/ 
E KN N 
= / A LTU IISI TY 1-5 ssitseo! 
2 ! 
SLIMIN 10 KYATTSINI 5 ; 
180 10.00468.. 11 ua LEREDIKI J 
v 
i 
KITA ISSN ot A AVOIN FYNR:O 
N E 
6.1.54 2 2 | 
K HE Jt" o a — 
<, ja s w 


A TOM - E | PI v , a am SARS a . 
Ee NO Rasvtoiiä Gem ES2oimmisei n ITE Otsevuika .- N Ja 


2 = veres, 261.00 20.m ass LAU dä kt =21248 


EU Pöes TS. n 


S. niitniorsaa 
J 


M 


14.0 


tietotehdas oy 


16 

Matriisikäskyluettelo Esimerkki 
Kahden matriisin yh- 99 MAT C= A + B 
teenlasku 
Kahden matriisin vä- 99 MAT C=: A-B 
hentäminen toisistaan 
Matriisin kertominen 99 MAT € = A*B 
toisella 
Matriisin kertominen 99 MAT B = (K)XA 

* reaaliluvulla 
Matriisin kääntäminen 99 MAT B = iINV(A) 
Matriisin transponointi 99 MAT B=TRN(A) 
Matriisin alkioiden muut- 99 MAT A = CON(M,N) 
taminen ykkösiksi 
Matriisin muuttaminen 99 MAT A = IND (N,N) 
ykkösmatriisiksi 
Matriisin alkioiden 99 MAT A = ZER (M,N) 
muuttaminen noliiksi 
Matriisin tukeminen 99 MAI READ A,8,C 
Matriisin painaminen 99 MAT PRINT A (1,2),B;C 


Jokaisen maätriisikäskyiltiä käsiteltävän taulukon 
ulottuvuudet on määrättävä DIM-käskyiiä. Koska tau- 
lukoissa on noltarivi ja noltasarake, varataan tila 


3 x 4 malriisitle A käskyliä DIM A(2,3). 


Käskyit:ä MAT-CON, MAT-!DN, MAT-ZER ja MATREAD voi- 
daan matriisin DI!M-käskyssä määrättyjä ulottuvuuksia 


pienentää, 


Esimerkiksi matriisinkääntöohje!massa varataan DIM- 
käskyi'ä tarpeeksi tilaa. Sen jäikeen luetaan kään-" 
nettävän matriisin todeilinen dimensio, supistetaan 
matriisit oikeaan kokoon MAT-CON-käsky!lä ennen 
käännöskäskyä MAT-INV. 
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Huomautus: 


DIMIA 3.05.5099 'B15085/0 
READ N 


MAT A = CON (N-i, N-1) 
MAT B = CON (N-1(, N-1) 
MAT READ A 

MAT B = iINV (A) 

MAT PRINT B 

DATA 3 

DATA. 1:2,;1.4,8,;0; 19859 


END 


Listojen ja tauiukoiden nimet koostu- 


vat yhdestä kirjaimesta. 


ma 


oha << Ja 
= 1 v ä 
N SA ÄÄ 


ä aa 


